DriveType, eigenschap

Beschrijving

Geeft een waarde terug die het type aanduidt van een opgegeven station.

Syntaxis

object.DriveType

Het object is altijd een object Drive.

Notities

De volgende code illustreert het gebruik van de eigenschap DriveType:

Sub ShowDriveType(drvpath)
    Dim fs, d, s, t
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set d = fs.GetDrive(drvpath)
    Select Case d.DriveType
        Case 0: t = "Onbekend"
        Case 1: t = "Verwijderbaar"
        Case 2: t = "Vast"
        Case 3: t = "Netwerk"
        Case 4: t = "cd-rom"
        Case 5: t = "RAM-schijf"
    End Select
    s = "Drive " & d.DriveLetter & ": - " & t
    MsgBox s
End Sub